home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
programr
/
catch.zip
/
RUN.WBF
< prev
Wrap
Text File
|
1993-03-03
|
451b
|
24 lines
;Example Catch file
;Copyright Sean Batten
let dir=GetWindir()
let dir=join(dir,"\*.exe")
Let program=fileselect(dir)
Let params=""
;Make sure something was selected
if program=="" goto abort
;Now find out if they want to specify parameters
ask ("Parameters", "Do you wish to specify parameters???")
if @YES let params=input ("","Enter parameters")
run (program,params)
goto end
:abort
ok ("","No program selected")
:end